home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.07 Jul 90 / Printing Primer ƒ / HeaderLine.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-11-07  |  1.3 KB  |  61 lines  |  [TEXT/KAHL]
  1. /*******************************************\
  2. *    file:         PrintFootNote.c                *
  3. *    version:    0.1ß                        *
  4. *     XFCN ID        508                            *
  5. *                                            *
  6. * Eject a page                              *
  7. *                                            *
  8. * -----------------------------------------    *
  9. * By:    Donald Koscheka                        *
  10. * Date:    30-OCT-89                            *
  11. * ©    Copyright 1989, Donald Koscheka            *
  12. *    All Rights Reserved                        *
  13. *                                            *
  14. * -----------------------------------------    *
  15. \*******************************************/
  16.  
  17.  
  18. #include <MacTypes.h>
  19. #include <MemoryMgr.h>
  20. #include <ResourceMgr.h>
  21. #include <OSUtil.h>
  22. #include <HyperXCmd.h>
  23. #include <HyperUtils.h>
  24. #include <PrintMgr.h>
  25. #include "ReportUtils.h"
  26.  
  27.  
  28. pascal void main( paramPtr )
  29.     XCmdBlockPtr    paramPtr;
  30. /**********************************
  31. * params[0] == Client Name.
  32. * params[1] == Version Number.
  33. * params[2] == date.
  34. * params[3] == starting page number.
  35. **********************************/
  36. {
  37.     Handle        pH;
  38.     pInfoPtr    pp;
  39.     short        siz;
  40.     FontInfo    fInfo;
  41.     short        hite;
  42.     GrafPtr        oldPort;
  43.     
  44.     if(  pH = GetSystemResource( PAGE_INFO, PAGE_ID )  ){
  45.         pp = (pInfoPtr)*pH;
  46.             
  47.         GetPort( &oldPort );
  48.         SetPort( (GrafPtr)(pp->prPort) );
  49.  
  50.         PenSize( 2, 2 );
  51.         MoveTo( pp->margin.left, pp->margin.top+2 );
  52.         LineTo( pp->margin.right, pp->margin.top+2 );
  53.         
  54.         PenNormal();
  55.         SetPort( oldPort );
  56.     }
  57.     
  58.     paramPtr->returnValue = NIL;
  59. }
  60.  
  61.